home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 15 / Amiga Plus Leser CD 15.iso / Tools / Development / MosaicSRC / src / gui-dialogs.c < prev    next >
Encoding:
C/C++ Source or Header  |  2002-03-13  |  19.4 KB  |  569 lines
  1. // MDF - PORT FROM NCSA VERSION 2.1
  2. // In progress...
  3.  
  4. /****************************************************************************
  5.  * NCSA Mosaic for the X Window System                                      *
  6.  * Software Development Group                                               *
  7.  * National Center for Supercomputing Applications                          *
  8.  * University of Illinois at Urbana-Champaign                               *
  9.  * 605 E. Springfield, Champaign IL 61820                                   *
  10.  * mosaic@ncsa.uiuc.edu                                                     *
  11.  *                                                                          *
  12.  * Copyright (C) 1993, Board of Trustees of the University of Illinois      *
  13.  *                                                                          *
  14.  * NCSA Mosaic software, both binary and source (hereafter, Software) is    *
  15.  * copyrighted by The Board of Trustees of the University of Illinois       *
  16.  * (UI), and ownership remains with the UI.                                 *
  17.  *                                                                          *
  18.  * The UI grants you (hereafter, Licensee) a license to use the Software    *
  19.  * for academic, research and internal business purposes only, without a    *
  20.  * fee.  Licensee may distribute the binary and source code (if released)   *
  21.  * to third parties provided that the copyright notice and this statement   *
  22.  * appears on all copies and that no charge is associated with such         *
  23.  * copies.                                                                  *
  24.  *                                                                          *
  25.  * Licensee may make derivative works.  However, if Licensee distributes    *
  26.  * any derivative work based on or derived from the Software, then          *
  27.  * Licensee will (1) notify NCSA regarding its distribution of the          *
  28.  * derivative work, and (2) clearly notify users that such derivative       *
  29.  * work is a modified version and not the original NCSA Mosaic              *
  30.  * distributed by the UI.                                                   *
  31.  *                                                                          *
  32.  * Any Licensee wishing to make commercial use of the Software should       *
  33.  * contact the UI, c/o NCSA, to negotiate an appropriate license for such   *
  34.  * commercial use.  Commercial use includes (1) integration of all or       *
  35.  * part of the source code into a product for sale or license by or on      *
  36.  * behalf of Licensee to third parties, or (2) distribution of the binary   *
  37.  * code or source code to third parties that need it to utilize a           *
  38.  * commercial product sold or licensed by or on behalf of Licensee.         *
  39.  *                                                                          *
  40.  * UI MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THIS SOFTWARE FOR   *
  41.  * ANY PURPOSE.  IT IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED          *
  42.  * WARRANTY.  THE UI SHALL NOT BE LIABLE FOR ANY DAMAGES SUFFERED BY THE    *
  43.  * USERS OF THIS SOFTWARE.                                                  *
  44.  *                                                                          *
  45.  * By using or copying this Software, Licensee agrees to abide by the       *
  46.  * copyright law and all other applicable laws of the U.S. including, but   *
  47.  * not limited to, export control laws, and the terms of this license.      *
  48.  * UI shall have the right to terminate this license immediately by         *
  49.  * written notice upon Licensee's breach of, or non-compliance with, any    *
  50.  * of its terms.  Licensee may be held legally responsible for any          *
  51.  * copyright infringement that is caused or encouraged by Licensee's        *
  52.  * failure to abide by the terms of this license.                           *
  53.  *                                                                          *
  54.  * Comments and questions are welcome and can be sent to                    *
  55.  * mosaic-x@ncsa.uiuc.edu.                                                  *
  56.  ****************************************************************************/
  57.  
  58. #include "includes.h"
  59. #include "HTML.h"
  60. #include "mosaic.h"
  61. #include "globals.h"
  62. #include "protos.h"
  63. #include <dos.h>
  64.  
  65. #include "amosaic_cat.h"
  66.  
  67. extern ULONG HookEntry();
  68.  
  69. extern Widget toplevel;
  70. extern mo_window *current_win;
  71.  
  72. typedef enum
  73. {
  74.     mo_plaintext = 0, mo_formatted_text, mo_html, mo_latex, mo_postscript,
  75.     mo_mif
  76. } mo_format_token;
  77.  
  78. static char default_save_dir[255] ;
  79.  
  80. char *format_opts[4];
  81.  
  82. /* ------------------------------------------------------------------------ */
  83. /* ----------------------------- SAVE WINDOW ------------------------------ */
  84. /* ------------------------------------------------------------------------ */
  85.  
  86. /* ------------------------- mo_post_save_window -------------------------- */
  87.  
  88. static unsigned long save_win_cb(struct Hook *h, void *o, int *msg)
  89. {
  90.     mo_window *win = (mo_window *)h->h_Data;
  91.     Object *window = (Object *)o;
  92.     FILE *fp;
  93.     char *fname;
  94.  
  95.     get(win->format_optmenu, MUIA_Cycle_Active, &(win->save_format));
  96.     
  97.     switch (*msg)
  98.         {
  99.         case 0:
  100.             set(window, MUIA_Window_Open, FALSE);
  101.             get(win->save_fname, MUIA_String_Contents, &fname);
  102.             fp = fopen(fname, "w");
  103.             if (!fp)
  104.     {
  105.         /* error */
  106.     }
  107.             else
  108.     {
  109.         if (win->save_format == mo_plaintext)
  110.             {
  111.                 char *text = HTMLGetText (win->scrolled_win, 0);
  112.                 if (text)
  113.         {
  114.             fputs (text, fp);
  115.             free (text);
  116.         }
  117.             }
  118.         else if (win->save_format == mo_formatted_text)
  119.             {
  120.                 char *text = HTMLGetText (win->scrolled_win, 1);
  121.                 if (text)
  122.         {
  123.             fputs (text, fp);
  124.             free (text);
  125.         }
  126.             }
  127.         else if (win->save_format == mo_postscript)
  128.             {
  129.                 char *text = HTMLGetText (win->scrolled_win, 2);
  130.                 if (text)
  131.         {
  132.             fputs (text, fp);
  133.             free (text);
  134.         }
  135.             }
  136.         else if (win->current_node && win->current_node->text)
  137.             {
  138.                 /* HTML source */
  139.                 fputs (win->current_node->text, fp);
  140.             }
  141.         fclose (fp);
  142.         break;
  143.     }
  144.         case 1:
  145.             set(window, MUIA_Window_Open, FALSE);
  146.             break;
  147.         }
  148.     return (unsigned long) 0;
  149. }
  150.  
  151.  
  152. mo_status mo_post_save_window (mo_window *win)
  153. {
  154.     extern char *url;
  155.  
  156.     if (!win->save_win)
  157.         {
  158.             struct Hook *save_win_cb_hook = malloc(sizeof(struct Hook));
  159.             Object *b_save, *b_clear, *b_cancel;
  160.  
  161.             save_win_cb_hook->h_Entry = HookEntry;
  162.             save_win_cb_hook->h_SubEntry = save_win_cb;
  163.             save_win_cb_hook->h_Data = win;
  164.  
  165.             format_opts[0]=GetamosaicString(MSG_REQ_SAVE_FILEFORMAT_PLAIN);
  166.             format_opts[1]=GetamosaicString(MSG_REQ_SAVE_FILEFORMAT_FORMATTED);
  167.             format_opts[2]=GetamosaicString(MSG_REQ_SAVE_FILEFORMAT_HTML);
  168.             format_opts[3]=NULL;
  169.  
  170.             win->save_win = WindowObject,
  171.                 MUIA_Window_Title, GetamosaicString(MSG_REQ_SAVE_TITLE),
  172.                 MUIA_Window_RefWindow, win->view,
  173.                 MUIA_Window_ID,MAKE_ID('S','V','A','S'),
  174.                 WindowContents, VGroup,
  175.                     Child,ColGroup(2),
  176.                         Child, Label2(GetamosaicString(MSG_REQ_SAVE_FILEFORMAT)),
  177.                         Child, win->format_optmenu = CycleObject,
  178.                                      MUIA_Cycle_Entries, format_opts, End,
  179.                         Child, Label2(GetamosaicString(MSG_REQ_SAVE_FILE)),
  180.                         Child,PopaslObject,
  181.                             MUIA_Popstring_String,win->save_fname=StringObject,StringFrame,MUIA_String_MaxLen,512,End,
  182.                             MUIA_Popstring_Button,PopButton(MUII_PopDrawer),
  183.                             ASLFR_TitleText,GetamosaicString(MSG_REQ_SAVE_FILEREQ_TITLE),
  184.                             ASLFR_PositiveText,GetamosaicString(MSG_REQ_SAVE_FILEREQ_POSTEXT),
  185.                             ASLFR_DoSaveMode,TRUE,
  186.                             End,
  187.                         End,
  188.                     Child, HGroup,
  189.                         MUIA_Group_SameWidth,TRUE,
  190.                         Child, b_save = SimpleButton(GetamosaicString(MSG_REQ_SAVE_SAVE)),
  191.                         Child, b_clear = SimpleButton(GetamosaicString(MSG_REQ_SAVE_CLEAR)),
  192.                         Child, b_cancel = SimpleButton(GetamosaicString(MSG_REQ_SAVE_CANCEL)),
  193.                     End,
  194.                 End,
  195.             End;
  196.  
  197.             DoMethod(win->save_win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
  198.                  win->save_win, 3, MUIM_Set, MUIA_Window_Open, FALSE);
  199.             DoMethod(b_save, MUIM_Notify, MUIA_Pressed, FALSE,
  200.                  win->save_win, 3, MUIM_CallHook, save_win_cb_hook, 0);
  201.             DoMethod(b_cancel, MUIM_Notify, MUIA_Pressed, FALSE,
  202.                  win->save_win, 3, MUIM_CallHook, save_win_cb_hook, 1);
  203.             DoMethod(b_clear, MUIM_Notify, MUIA_Pressed, FALSE,
  204.                  win->save_fname, 3, MUIM_Set, MUIA_String_Contents, NULL);
  205.             DoMethod(win->save_fname, MUIM_Notify, MUIA_String_Acknowledge,
  206.                  MUIV_EveryTime, win->save_win, 3, MUIM_CallHook,
  207.                  save_win_cb_hook, 0);
  208.  
  209.             DoMethod(App, OM_ADDMEMBER, win->save_win);
  210.         }
  211.  
  212.     if (!*default_save_dir) {
  213.         if (Rdata.download_dir) strcpy(default_save_dir, Rdata.download_dir);
  214.         else getcd(0, default_save_dir);
  215.     }
  216.     AddPart(default_save_dir, FilePart(win->cached_url), 200);
  217.     set(win->save_fname, MUIA_String_Contents, default_save_dir);
  218.     set(win->save_win, MUIA_Window_Open, TRUE);
  219.     *(PathPart(default_save_dir)) = '\0';
  220.     return mo_succeed;
  221. }
  222.  
  223.  
  224. /* ------------------------------------------------------------------------ */
  225.         /* -------------------------- SAVEBINARY WINDOW --------------------------- */
  226. /* ------------------------------------------------------------------------ */
  227.  
  228. char *temp_binary_fnam;
  229.  
  230. mo_status mo_post_savebinary_window (mo_window *win)
  231. {
  232.     struct FileRequester *fr;
  233.     struct Window *w = NULL;
  234.     int result;
  235.     char *cmd, *urlname;
  236.     
  237.     if (!*default_save_dir) {
  238.         if (Rdata.download_dir) strcpy(default_save_dir, Rdata.download_dir);
  239.         else getcd(0, default_save_dir);
  240.     }
  241.     urlname = FilePart(url) ;
  242.     fr = MUI_AllocAslRequestTags(ASL_FileRequest, ASLFR_TitleText, GetamosaicString(MSG_REQ_SAVEBINARY_TITLE),
  243.                          TAG_DONE);
  244.     GetAttr(MUIA_Window_Window, WI_Main, (ULONG *)(&w));
  245.     result = MUI_AslRequestTags(fr, ASLFR_Window, w, ASLFR_PositiveText, GetamosaicString(MSG_REQ_SAVEBINARY_POSTEXT),
  246.                         ASLFR_DoSaveMode, TRUE,
  247.                         ASLFR_InitialDrawer, default_save_dir,
  248.                         ASLFR_InitialFile, urlname,
  249.                         TAG_DONE);
  250.     if (result) {
  251.         AddPart(default_save_dir, fr->rf_Dir, 226300);
  252.         AddPart(default_save_dir, fr->rf_File, 200);
  253.         cmd = (char *)malloc((strlen(temp_binary_fnam)+
  254.                 strlen(default_save_dir)+16));
  255.         sprintf(cmd, "Copy %s %s", temp_binary_fnam, default_save_dir);
  256.         system(cmd);
  257.         strcpy(default_save_dir, fr->rf_Dir);    /* For next time */
  258.         unlink(temp_binary_fnam);
  259.     }
  260.     free(temp_binary_fnam);
  261.     free(cmd);
  262.     
  263.     if (fr) MUI_FreeAslRequest(fr);
  264.  
  265.     return mo_succeed;
  266. }
  267.  
  268. void rename_binary_file (char *fnam)
  269. {
  270.     mo_window *win = current_win;
  271.     temp_binary_fnam = strdup (fnam);
  272.     mo_post_savebinary_window (win);
  273. }
  274.  
  275. /* ----------------------- mo_post_open_window ------------------------ */
  276.  
  277. static unsigned long open_win_cb(struct Hook *h, void *o, int *msg)
  278. {
  279.     mo_window *win = (mo_window *)h->h_Data;
  280.     Object *window = (Object *)o;
  281.     char *url;
  282.  
  283.     set(window, MUIA_Window_Open, FALSE);
  284.  
  285.     switch (*msg)
  286.         {
  287.         case 0:
  288.             get(win->open_text, MUIA_String_Contents, &url);
  289.             mo_convert_newlines_to_spaces (url);
  290.             if (!strstr (url, ":"))
  291.                 {
  292.                     char *freeme = url;
  293.                     url = mo_url_canonicalize_local (url);
  294.                     free (freeme);
  295.                 }
  296.             mo_load_window_text (win, url, NULL);
  297.             /* The following free breaks things under the following conditions:
  298.  
  299.                  Start Mosaic with home page something that can't be fetched.
  300.                  Interrupt, hit 'open', enter a URL, fetch document.
  301.                  Follow relative link. */
  302.             /* free (url); */
  303.             break;
  304.         case 1:
  305.             /* Do nothing. */
  306.             break;
  307.         }
  308.  
  309.     return (unsigned long)0;
  310. }
  311.  
  312. mo_status mo_post_open_window (mo_window *win)
  313. {
  314.     if (!win->open_win)
  315.         {
  316.             struct Hook *open_win_cb_hook = malloc(sizeof(struct Hook));
  317.             Object *b_open, *b_clear, *b_cancel;
  318.             
  319.             open_win_cb_hook->h_Entry = HookEntry;
  320.             open_win_cb_hook->h_SubEntry = open_win_cb;
  321.             open_win_cb_hook->h_Data = win;
  322.  
  323.             /* Create it for the first time. */
  324.             win->open_win = WindowObject,
  325.                 MUIA_Window_Title, GetamosaicString(MSG_REQ_URL_TITLE),
  326.                 MUIA_Window_RefWindow, win->view,
  327.                 MUIA_Window_ID,MAKE_ID('O','U','R','L'),
  328.                 WindowContents, VGroup,
  329.                     Child, HGroup,
  330.                         Child, Label2(GetamosaicString(MSG_REQ_URL_URL)),
  331.                         Child, win->open_text = StringObject, StringFrame,
  332.                                      MUIA_String_MaxLen, 512, End,
  333.                     End,
  334.                     Child, HGroup,
  335.                         Child, b_open = SimpleButton(GetamosaicString(MSG_REQ_URL_OPEN)),
  336.                         Child, b_clear = SimpleButton(GetamosaicString(MSG_REQ_URL_CLEAR)),
  337.                         Child, b_cancel = SimpleButton(GetamosaicString(MSG_REQ_URL_CANCEL)),
  338.                     End,
  339.                 End,
  340.             End;
  341.  
  342.             DoMethod(win->open_win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
  343.                  win->open_win, 3, MUIM_Set, MUIA_Window_Open, FALSE);
  344.             DoMethod(b_open, MUIM_Notify, MUIA_Pressed, FALSE,
  345.                  win->open_win, 3, MUIM_CallHook, open_win_cb_hook, 0);
  346.             DoMethod(b_cancel, MUIM_Notify, MUIA_Pressed, FALSE,
  347.                  win->open_win, 3, MUIM_CallHook, open_win_cb_hook, 1);
  348.             DoMethod(b_clear, MUIM_Notify, MUIA_Pressed, FALSE,
  349.                  win->open_text, 3, MUIM_Set, MUIA_String_Contents, NULL);
  350.             DoMethod(win->open_text, MUIM_Notify, MUIA_String_Acknowledge,
  351.                  MUIV_EveryTime, win->open_win, 3, MUIM_CallHook,
  352.                  open_win_cb_hook, 0);
  353.             DoMethod(win->open_win, MUIM_Window_SetCycleChain,win->open_text,b_open,b_clear,b_cancel,NULL);
  354.     
  355.             DoMethod(App, OM_ADDMEMBER, win->open_win);
  356.         }
  357.  
  358.     {
  359.         char *url;
  360.         get(TX_URL,MUIA_String_Contents,&url);
  361.         set(win->open_text,MUIA_String_Contents,url);
  362.     }         
  363.  
  364.     set(win->open_win, MUIA_Window_ActiveObject, win->open_text);
  365.     set(win->open_win, MUIA_Window_Open, TRUE);
  366.  
  367.     return mo_succeed;
  368. }
  369.  
  370.  
  371. /* ----------------------- mo_post_source_window ------------------------ */
  372.  
  373. mo_status mo_post_source_window (mo_window *win)
  374. {
  375.     if (!win->source_win)
  376.         {
  377.             /* Create it for the first time. */
  378.             win->source_win = WindowObject,
  379.                 MUIA_Window_Title, GetamosaicString(MSG_WIN_SOURCE_TITLE),
  380.                 MUIA_Window_ID, MAKE_ID('S','R','C','E'),
  381.                 MUIA_Window_RefWindow, win->view,
  382. //rs                MUIA_Window_LeftEdge, MUIV_Window_LeftEdge_Centered,
  383. //rs                MUIA_Window_TopEdge, MUIV_Window_TopEdge_Centered,
  384. //rs                MUIA_Window_Width, 400,
  385. //rs                MUIA_Window_Height, 150,
  386.                 WindowContents, VGroup,
  387.                     Child, win->source_text = ListviewObject, MUIA_Listview_Input,FALSE,MUIA_Listview_List,
  388.                                  FloattextObject, ReadListFrame, End,
  389.                     End,
  390.                 End,
  391.             End;
  392.  
  393.             DoMethod(win->source_win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
  394.                  win->source_win, 3, MUIM_Set, MUIA_Window_Open, FALSE);
  395.  
  396.             DoMethod(App, OM_ADDMEMBER, win->source_win);
  397.         }
  398.  
  399.     set(win->source_win, MUIA_Window_Open, TRUE);
  400.  
  401.     if (win->current_node)
  402.         {
  403.             set(win->source_text, MUIA_Floattext_Text, win->current_node->text);
  404.         }
  405.     return mo_succeed;
  406. }
  407.  
  408.  
  409.  
  410. /* ----------------------- mo_post_search_window ------------------------ */
  411.  
  412. static unsigned long search_win_cb(struct Hook *h, void *o, int *msg)
  413. {
  414.     mo_window *win = (mo_window *)h->h_Data;
  415.     Object *window = (Object *)o;
  416.  
  417.     switch (*msg)
  418.         {
  419.         case 0: /* Search */
  420.             {
  421.                 char *str;
  422.  
  423.     get(win->search_win_text, MUIA_String_Contents, &str);
  424.  
  425. //    TO_HTML_SetSearch();
  426.  
  427. //#if FALSE /*    above fn HAS TO DO */
  428.  
  429.                 if (str && *str)
  430.                     {
  431.                         int backward, caseless, rc;
  432.  
  433.             get(win->search_backwards_toggle, MUIA_Selected, &backward);
  434.             get(win->search_caseless_toggle, MUIA_Selected, &caseless);
  435.  
  436.                         if (!backward)
  437.                             {
  438.                                 /* Either win->search_start->id is 0, in which case the search
  439.                                      should start from the beginning, or it's non-0, in which case
  440.                                      at least one search step has already been taken.
  441.                                      If the latter, it should be incremented so as to start
  442.                                      the search after the last hit.    Right? */
  443.                                 if (((ElementRef *)win->search_start)->id)
  444.                                     {
  445.                                         ((ElementRef *)win->search_start)->id =
  446.                                             ((ElementRef *)win->search_end)->id;
  447.                                         ((ElementRef *)win->search_start)->pos =
  448.                                             ((ElementRef *)win->search_end)->pos;
  449.                                     }
  450.                                 
  451.                             }
  452.  
  453.                         rc = HTMLSearchText 
  454.                             (win->scrolled_win, str, 
  455.                              (ElementRef *)win->search_start, 
  456.                              (ElementRef *)win->search_end, 
  457.                              backward, caseless);
  458.  
  459.                         if (rc == -1)
  460.                             {
  461.                                 /* No match was found. */
  462.                                 if (((ElementRef *)win->search_start)->id)
  463.             MUI_Request(App, WI_Main, 0,
  464.                          GetamosaicString(MSG_REQ_FINDRESULT_TITLE), GetamosaicString(MSG_REQ_FINDRESULT_OK),
  465.                          GetamosaicString(MSG_REQ_FINDRESULT_NO_MORE_MATCHES),
  466.                          TAG_END) ;
  467.                                 else
  468.             MUI_RequestA(App, WI_Main, 0,
  469.                          GetamosaicString(MSG_REQ_FINDRESULT_TITLE), GetamosaicString(MSG_REQ_FINDRESULT_OK),
  470.                          GetamosaicString(MSG_REQ_FINDRESULT_NO_MATCHES),
  471.                          TAG_END) ;
  472.                             }
  473.                         else
  474.                             {
  475.                                 /* Now search_start and search_end are starting and ending
  476.                                      points of the match. */
  477.         HTMLGotoId(win->scrolled_win,
  478.             ((ElementRef *)win->search_start)->id);             
  479. //        ResetAmigaGadgets();
  480.  
  481.                                 /* Set the selection. */
  482. #if 0 /* Needs to wait for HTMLSetSelection to work */
  483.                                 HTMLSetSelection (win->scrolled_win, (ElementRef *)win->search_start,
  484.                                                                     (ElementRef *)win->search_end);
  485. #endif
  486.                             } /* found a target */
  487.                     } /* if str && *str */
  488. //#endif
  489.             } /* case */
  490.             break;
  491.  
  492.         case 1: /* Clear */
  493.             /* Clear out the search text */
  494.             set(win->search_win_text, MUIA_String_Contents, NULL);
  495.  
  496.             /* Subsequent searches start at the beginning. */
  497.             TO_HTML_reset_search(win);
  498.             /*
  499.             ((ElementRef *)win->search_start)->id = 0;
  500.             */
  501.             /* Reposition document at top of screen. */
  502.             HTMLGotoId(win->scrolled_win, 0);
  503. /*            HTMLGotoId(win, 0); */
  504.             break;
  505.         }
  506.  
  507.     return (unsigned long)0;
  508. }
  509.  
  510. mo_status mo_post_search_window (mo_window *win)
  511. {
  512.     if (!win->search_win)
  513.         {
  514.             struct Hook *search_win_cb_hook = malloc(sizeof(struct Hook));
  515.             Object *b_find, *b_clear, *b_cancel;
  516.             
  517.             search_win_cb_hook->h_Entry = HookEntry;
  518.             search_win_cb_hook->h_SubEntry = search_win_cb;
  519.             search_win_cb_hook->h_Data = win;
  520.  
  521.             /* Create it for the first time. */
  522.             win->search_win = WindowObject,
  523.                 MUIA_Window_Title, GetamosaicString(MSG_REQ_FIND_TITLE),
  524.                 MUIA_Window_ID,MAKE_ID('F','I','N','D'),
  525.                 MUIA_Window_RefWindow, win->view,
  526.                 WindowContents, VGroup,
  527.                     Child, HGroup,
  528.                         Child, Label2(GetamosaicString(MSG_REQ_FIND_STRING)),
  529.                         Child, win->search_win_text = StringObject, StringFrame,
  530.                                      MUIA_String_MaxLen, 512, End,
  531.                     End,
  532.                     Child, HGroup,
  533.                         Child, Label1(GetamosaicString(MSG_REQ_FIND_CASELESS)),
  534.                         Child, win->search_caseless_toggle = CheckMark(TRUE),
  535.                         Child, Label1(GetamosaicString(MSG_REQ_FIND_BACKWARDS)),
  536.                         Child, win->search_backwards_toggle = CheckMark(FALSE),
  537.                     End,
  538.                     Child, HGroup,
  539.                         Child, b_find = SimpleButton(GetamosaicString(MSG_REQ_FIND_FIND)),
  540.                         Child, b_clear = SimpleButton(GetamosaicString(MSG_REQ_FIND_CLEAR)),
  541.                         Child, b_cancel = SimpleButton(GetamosaicString(MSG_REQ_FIND_CANCEL)),
  542.                     End,
  543.                 End,
  544.             End;
  545.  
  546.             DoMethod(win->search_win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
  547.                  win->search_win, 3, MUIM_Set, MUIA_Window_Open, FALSE);
  548.             DoMethod(b_find, MUIM_Notify, MUIA_Pressed, FALSE,
  549.                  win->search_win, 3, MUIM_CallHook, search_win_cb_hook, 0);
  550.             DoMethod(b_clear, MUIM_Notify, MUIA_Pressed, FALSE,
  551.                  win->search_win, 3, MUIM_CallHook, search_win_cb_hook, 1);
  552.             DoMethod(b_cancel, MUIM_Notify, MUIA_Pressed, FALSE,
  553.                  win->search_win, 3, MUIM_Set, MUIA_Window_Open, FALSE);
  554.             DoMethod(win->search_win_text, MUIM_Notify, MUIA_String_Acknowledge,
  555.                  MUIV_EveryTime, win->search_win, 3, MUIM_CallHook,
  556.                  search_win_cb_hook, 0);
  557.             DoMethod(win->search_win_text, MUIM_Notify, MUIA_String_Acknowledge,
  558.                  MUIV_EveryTime, win->search_win, 3, MUIM_Set,
  559.                  MUIA_Window_ActiveObject, b_find );
  560.             DoMethod(win->search_win,MUIM_Window_SetCycleChain,win->search_win_text,win->search_caseless_toggle,
  561.                 win->search_backwards_toggle,b_find,b_clear,b_cancel,NULL);
  562.             DoMethod(App, OM_ADDMEMBER, win->search_win);
  563.         }
  564.  
  565.     set(win->search_win, MUIA_Window_Open, TRUE);
  566.     set(win->search_win, MUIA_Window_ActiveObject,win->search_win_text);
  567.     return mo_succeed;
  568. }
  569.